Philadelphia Demographics

Code
# Set Census API key
census_api_key("3aaee31789e10b674a531e9f236c35d5394b19ed")
To install your API key for use in future sessions, run this function with `install = TRUE`.
Code
philadelphia_svi <- find_svi(year = 2022, state = "PA", geography = "tract")
Getting data from the 2018-2022 5-year ACS
Fetching data by table type ("B/C", "S", "DP") and combining the result.
✔ Finished retrieving census data for 2022 PA
✔ Finished summarising theme-specific and overall SVI. For all variables, set 'full.table = TRUE'
Code
# Filter for Philadelphia County (FIPS code for Philadelphia County is 42101)
philadelphia_svi <- subset(philadelphia_svi, grepl("^42101", GEOID))
Code
map_tracts <- left_join(map_tracts, philadelphia_svi, by = "GEOID") %>%
  mutate(pop_density = pop_total / area_mi)

NOTE: Hispanic, Native American, Pacific Islander, and Drop Out percentages are colored numerically and represent absolute values on a continuous scale.

Population Map

Age and Sex Map

Education Map

Housing Map

Social Vulnerability Index (SVI) Map